home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / qbandc1a / qbcolor.frm < prev    next >
Text File  |  1999-09-17  |  14KB  |  459 lines
  1. VERSION 5.00
  2. Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
  3. Begin VB.Form Form1 
  4.    BackColor       =   &H00FF8080&
  5.    Caption         =   "Form1"
  6.    ClientHeight    =   6105
  7.    ClientLeft      =   165
  8.    ClientTop       =   735
  9.    ClientWidth     =   5580
  10.    LinkTopic       =   "Form1"
  11.    ScaleHeight     =   6105
  12.    ScaleWidth      =   5580
  13.    StartUpPosition =   3  'Windows Default
  14.    Begin VB.TextBox Text1 
  15.       BeginProperty Font 
  16.          Name            =   "MS Sans Serif"
  17.          Size            =   13.5
  18.          Charset         =   0
  19.          Weight          =   400
  20.          Underline       =   0   'False
  21.          Italic          =   0   'False
  22.          Strikethrough   =   0   'False
  23.       EndProperty
  24.       Height          =   375
  25.       Left            =   2160
  26.       MaxLength       =   8
  27.       TabIndex        =   17
  28.       Top             =   5520
  29.       Width           =   3255
  30.    End
  31.    Begin VB.CommandButton Command1 
  32.       Caption         =   "&Change Color"
  33.       Height          =   375
  34.       Left            =   120
  35.       TabIndex        =   16
  36.       Top             =   5520
  37.       Width           =   1815
  38.    End
  39.    Begin MSComDlg.CommonDialog CommonDialog1 
  40.       Left            =   5040
  41.       Top             =   1800
  42.       _ExtentX        =   847
  43.       _ExtentY        =   847
  44.       _Version        =   393216
  45.    End
  46.    Begin VB.Timer Timer1 
  47.       Interval        =   1000
  48.       Left            =   5040
  49.       Top             =   1320
  50.    End
  51.    Begin VB.Label Label1 
  52.       BackStyle       =   0  'Transparent
  53.       Caption         =   "Label1"
  54.       BeginProperty Font 
  55.          Name            =   "MS Sans Serif"
  56.          Size            =   18
  57.          Charset         =   0
  58.          Weight          =   700
  59.          Underline       =   0   'False
  60.          Italic          =   0   'False
  61.          Strikethrough   =   0   'False
  62.       EndProperty
  63.       Height          =   405
  64.       Index           =   15
  65.       Left            =   2880
  66.       TabIndex        =   15
  67.       Top             =   4320
  68.       Width           =   2655
  69.    End
  70.    Begin VB.Label Label1 
  71.       BackStyle       =   0  'Transparent
  72.       Caption         =   "Label1"
  73.       BeginProperty Font 
  74.          Name            =   "MS Sans Serif"
  75.          Size            =   18
  76.          Charset         =   0
  77.          Weight          =   700
  78.          Underline       =   0   'False
  79.          Italic          =   0   'False
  80.          Strikethrough   =   0   'False
  81.       EndProperty
  82.       Height          =   405
  83.       Index           =   14
  84.       Left            =   2880
  85.       TabIndex        =   14
  86.       Top             =   3720
  87.       Width           =   2655
  88.    End
  89.    Begin VB.Label Label1 
  90.       BackStyle       =   0  'Transparent
  91.       Caption         =   "Label1"
  92.       BeginProperty Font 
  93.          Name            =   "MS Sans Serif"
  94.          Size            =   18
  95.          Charset         =   0
  96.          Weight          =   700
  97.          Underline       =   0   'False
  98.          Italic          =   0   'False
  99.          Strikethrough   =   0   'False
  100.       EndProperty
  101.       Height          =   405
  102.       Index           =   13
  103.       Left            =   2880
  104.       TabIndex        =   13
  105.       Top             =   3120
  106.       Width           =   2655
  107.    End
  108.    Begin VB.Label Label1 
  109.       BackStyle       =   0  'Transparent
  110.       Caption         =   "Label1"
  111.       BeginProperty Font 
  112.          Name            =   "MS Sans Serif"
  113.          Size            =   18
  114.          Charset         =   0
  115.          Weight          =   700
  116.          Underline       =   0   'False
  117.          Italic          =   0   'False
  118.          Strikethrough   =   0   'False
  119.       EndProperty
  120.       Height          =   405
  121.       Index           =   12
  122.       Left            =   2880
  123.       TabIndex        =   12
  124.       Top             =   2520
  125.       Width           =   2655
  126.    End
  127.    Begin VB.Label Label1 
  128.       BackStyle       =   0  'Transparent
  129.       Caption         =   "Label1"
  130.       BeginProperty Font 
  131.          Name            =   "MS Sans Serif"
  132.          Size            =   18
  133.          Charset         =   0
  134.          Weight          =   700
  135.          Underline       =   0   'False
  136.          Italic          =   0   'False
  137.          Strikethrough   =   0   'False
  138.       EndProperty
  139.       Height          =   405
  140.       Index           =   11
  141.       Left            =   2880
  142.       TabIndex        =   11
  143.       Top             =   1920
  144.       Width           =   2655
  145.    End
  146.    Begin VB.Label Label1 
  147.       BackStyle       =   0  'Transparent
  148.       Caption         =   "Label1"
  149.       BeginProperty Font 
  150.          Name            =   "MS Sans Serif"
  151.          Size            =   18
  152.          Charset         =   0
  153.          Weight          =   700
  154.          Underline       =   0   'False
  155.          Italic          =   0   'False
  156.          Strikethrough   =   0   'False
  157.       EndProperty
  158.       Height          =   400
  159.       Index           =   10
  160.       Left            =   2880
  161.       TabIndex        =   10
  162.       Top             =   1320
  163.       Width           =   2655
  164.    End
  165.    Begin VB.Label Label1 
  166.       BackStyle       =   0  'Transparent
  167.       Caption         =   "Label1"
  168.       BeginProperty Font 
  169.          Name            =   "MS Sans Serif"
  170.          Size            =   18
  171.          Charset         =   0
  172.          Weight          =   700
  173.          Underline       =   0   'False
  174.          Italic          =   0   'False
  175.          Strikethrough   =   0   'False
  176.       EndProperty
  177.       Height          =   400
  178.       Index           =   9
  179.       Left            =   2880
  180.       TabIndex        =   9
  181.       Top             =   720
  182.       Width           =   2655
  183.    End
  184.    Begin VB.Label Label1 
  185.       BackStyle       =   0  'Transparent
  186.       Caption         =   "Label1"
  187.       BeginProperty Font 
  188.          Name            =   "MS Sans Serif"
  189.          Size            =   18
  190.          Charset         =   0
  191.          Weight          =   700
  192.          Underline       =   0   'False
  193.          Italic          =   0   'False
  194.          Strikethrough   =   0   'False
  195.       EndProperty
  196.       Height          =   400
  197.       Index           =   8
  198.       Left            =   2880
  199.       TabIndex        =   8
  200.       Top             =   120
  201.       Width           =   2655
  202.    End
  203.    Begin VB.Label Label1 
  204.       BackStyle       =   0  'Transparent
  205.       Caption         =   "Label1"
  206.       BeginProperty Font 
  207.          Name            =   "MS Sans Serif"
  208.          Size            =   18
  209.          Charset         =   0
  210.          Weight          =   700
  211.          Underline       =   0   'False
  212.          Italic          =   0   'False
  213.          Strikethrough   =   0   'False
  214.       EndProperty
  215.       Height          =   405
  216.       Index           =   7
  217.       Left            =   0
  218.       TabIndex        =   7
  219.       Top             =   4440
  220.       Width           =   2655
  221.    End
  222.    Begin VB.Label Label1 
  223.       BackStyle       =   0  'Transparent
  224.       Caption         =   "Label1"
  225.       BeginProperty Font 
  226.          Name            =   "MS Sans Serif"
  227.          Size            =   18
  228.          Charset         =   0
  229.          Weight          =   700
  230.          Underline       =   0   'False
  231.          Italic          =   0   'False
  232.          Strikethrough   =   0   'False
  233.       EndProperty
  234.       Height          =   405
  235.       Index           =   6
  236.       Left            =   0
  237.       TabIndex        =   6
  238.       Top             =   3720
  239.       Width           =   2655
  240.    End
  241.    Begin VB.Label Label1 
  242.       BackStyle       =   0  'Transparent
  243.       Caption         =   "Label1"
  244.       BeginProperty Font 
  245.          Name            =   "MS Sans Serif"
  246.          Size            =   18
  247.          Charset         =   0
  248.          Weight          =   700
  249.          Underline       =   0   'False
  250.          Italic          =   0   'False
  251.          Strikethrough   =   0   'False
  252.       EndProperty
  253.       Height          =   405
  254.       Index           =   5
  255.       Left            =